Abstract class distance_base
Template for the calculate function Import section
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(distance_base) | :: | distance |
A |
|||
real(kind=wp), | intent(inout), | dimension(:,:) | :: | vector1 |
A real vector |
|
real(kind=wp), | intent(inout), | dimension(:,:) | :: | vector2 |
A real vector |
A real variable with the distance
type,abstract :: distance_base !! Abstract class `distance_base` contains procedure(distance_function1),deferred :: calculate end type distance_base